(url-http-find-free-connection): braino.

diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index 66fb0da42b9290cb9ea09e7c1692e4b56836e7e9..22ca6010ef9cc044483150d39d516f701c456086 100644 (file)
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -121,7 +121,7 @@ request.")
          (let ((buf (generate-new-buffer " *url-http-temp*")))
            ;; `url-open-stream' needs a buffer in which to do things
            ;; like authentication.  But we use another buffer afterwards.
-           (unwind-protect (url-open-stream host nil host port)
+           (unwind-protect (url-open-stream host buf host port)
              (kill-buffer buf)))))))
 
 ;; Building an HTTP request